home *** CD-ROM | disk | FTP | other *** search
/ Workbench Design / WB Collection.iso / datatypes / clidt / source / rcs / classinit.asm,v < prev    next >
Text File  |  1996-04-07  |  3KB  |  140 lines
  1. head    39.1;
  2. access;
  3. symbols
  4.     V39_2:39.1
  5.     V39_1:39.1;
  6. locks; strict;
  7. comment    @;; @;
  8.  
  9.  
  10. 39.1
  11. date    95.08.07.23.46.06;    author StRuppert;    state Exp;
  12. branches;
  13. next    ;
  14.  
  15.  
  16. desc
  17. @initial
  18. @
  19.  
  20.  
  21. 39.1
  22. log
  23. @*** empty log    message    ***
  24. @
  25. text
  26. @;
  27. ; RomTag template for datatypes
  28. ;
  29. ; $VER: classinit.asm 39.1 (06.08.95)
  30. ;
  31. ; by
  32. ;
  33. ; Stefan Ruppert , Windthorststrasse 5 , 65439 Floersheim , GERMANY
  34. ;
  35. ; (C) Copyright 1995
  36. ; All Rights Reserved !
  37. ;
  38. ; $HISTORY:
  39. ;
  40. ; 06.08.95 : 039.001 : initial
  41. ;
  42.  
  43. ;---------------------------------------------------------------------------
  44.  
  45.           INCLUDE "exec/types.i"
  46.           INCLUDE "exec/libraries.i"
  47.           INCLUDE "exec/lists.i"
  48.           INCLUDE "exec/alerts.i"
  49.           INCLUDE "exec/initializers.i"
  50.           INCLUDE "exec/resident.i"
  51.           INCLUDE "libraries/dos.i"
  52.  
  53.           INCLUDE "classbase.i"
  54.  
  55. ;---------------------------------------------------------------------------
  56.  
  57.           XREF    _LibInit
  58.           XREF    _LibOpen
  59.           XREF    _LibClose
  60.           XREF    _LibExpunge
  61.  
  62.           XREF    ENDCODE
  63.  
  64.           SECTION CODE
  65.  
  66. ;---------------------------------------------------------------------------
  67.  
  68.           XDEF    LibReserved
  69.  
  70. ;---------------------------------------------------------------------------
  71.  
  72. ; First executable location, must return an error to the caller
  73. Start:
  74.           moveq   #-1,d0
  75.           rts
  76.  
  77. ;-----------------------------------------------------------------------
  78.  
  79. ROMTAG:
  80.           DC.W    RTC_MATCHWORD           ; UWORD RT_MATCHWORD
  81.           DC.L    ROMTAG                  ; APTR  RT_MATCHTAG
  82.           DC.L    ENDCODE                 ; APTR  RT_ENDSKIP
  83.           DC.B    RTF_AUTOINIT            ; UBYTE RT_FLAGS
  84.           DC.B    VERSION                 ; UBYTE RT_VERSION
  85.           DC.B    NT_LIBRARY              ; UBYTE RT_TYPE
  86.           DC.B    0                       ; BYTE  RT_PRI
  87.           DC.L    LibName                 ; APTR  RT_NAME
  88.           DC.L    LibId                   ; APTR  RT_IDSTRING
  89.           DC.L    LibInitTable            ; APTR  RT_INIT
  90.  
  91. LibName NAME
  92. LibId   VSTRING
  93.  
  94.           CNOP    0,4
  95.  
  96. LibInitTable:
  97.           DC.L    ClassBase_SIZEOF
  98.           DC.L    LibFuncTable
  99.           DC.L    LibDataTable
  100.           DC.L    _LibInit
  101.  
  102. V_DEF   MACRO
  103.           DC.W    \1+(*-LibFuncTable)
  104.           ENDM
  105.  
  106. LibFuncTable:
  107.           DC.W    -1
  108.           V_DEF   _LibOpen
  109.           V_DEF   _LibClose
  110.           V_DEF   _LibExpunge
  111.           V_DEF   LibReserved
  112.  
  113. ;       set ENGINE to your Obtain#?Engine function
  114.           V_DEF   ENGINE
  115.  
  116.           DC.W   -1
  117.  
  118. LibDataTable:
  119.           INITBYTE   LN_TYPE,NT_LIBRARY
  120.           INITLONG   LN_NAME,LibName
  121.           INITBYTE   LIB_FLAGS,(LIBF_SUMUSED!LIBF_CHANGED)
  122.           INITWORD   LIB_VERSION,VERSION
  123.           INITWORD   LIB_REVISION,REVISION
  124.           INITLONG   LIB_IDSTRING,LibId
  125.           DC.W       0
  126.  
  127.           CNOP    0,4
  128.  
  129. ;-----------------------------------------------------------------------
  130.  
  131. LibReserved:
  132.           moveq   #0,d0
  133.           rts
  134.  
  135. ;-----------------------------------------------------------------------
  136.  
  137.           END
  138.  
  139. @
  140.